;Start of program XPROG ;BLOCK XJUMP L1 ;Condition monitor checker L2: XPUSH L3 XVMKFRC XTFRCST 404 XPUSH L4 XCMFORCE ;Stop XSTOP 4 XCMDONE ;Create condition monitor L1: XCMMAK 36 3 L2 100004 ;Move ;Enable condition monitor XCMENBL 36 XMOVE L5 4 ;Disable condition monitor XCMDSBL 36 ;Block end cleanup XCMDEST 36 0 ;End of BLOCK XENDP ;End of program